home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
COMMUNIC
/
H191.ZIP
/
CA29-3.EXE
/
PLINK.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1990-11-29
|
2KB
|
42 lines
; ----- PLINK: Dial People/Link (PLINK) and connect (logon)
; ----------------------------------------------------------------
; Note: This script expects dialing directory entry #1 to be
; a direct-dial number. Telenet or other carrier access
; requires different scripting.
; ----------------------------------------------------------------
; Note: This script uses a LOGON file prepared by MKLOGON,
; if one is available.
; ----------------------------------------------------------------
;
; Dial PLINK
;
LEGEND " Dialing PLINK direct"
DEFTIME 60 ; Wait 60 seconds for an incoming string
IF NOT LINKED ; If script not invoked from Alt-D
RESET ; Reset defaults only if not linked
DIAL "1" ; Call dial dir entry number 1 (PLINK)
IF FAILED ; IF esc out
EXIT ; terminate script
ENDIF ; End if failed
ENDIF ; End if not linked
PAUSE "5" ; Wait for the modem to settle down
TRANSMIT "!" ; Transmit Carriage return <CR>
PAUSE "1" ; Wait 1 sec
TRANSMIT "!" ; Transmit Carriage return <CR>
WAITFOR "USER ID:" ; Wait for the 'USER ID' prompt
SET BSUPPRESS OFF ; Turn off blank line suppression
SET MASK ON ; Turn on high bit mask
SET CDISPLAY ON ; Display ctl chars
SET SLOW ON ; For Uploads, direct dial, this is best
;
; If we have a AHNLOGON file, use it
;
SET TTHRU OFF ; Let psw be typed
IF ISSCFILE "AHNLOGON"
FCALL "AHNLOGON"
ELSE
Alarm ; Sound alarm
ENDIF